home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C/C++ Users Group Library 1996 July
/
C-C++ Users Group Library July 1996.iso
/
vol_200
/
255_01
/
gpterm.asm
< prev
next >
Wrap
Assembly Source File
|
1988-03-28
|
896b
|
52 lines
page 80,132
page
;
; Kent Cedola
; 2015 Meadow Lake Court
; Norfolk, Virginia 23518
;
dgroup group _data
_data segment word public 'data'
assume ds:dgroup
extrn _gdtype:byte
_data ends
_text segment byte public 'code'
assume cs:_text,ds:dgroup
public _gpterm
_gpterm proc near
push bp
mov bp,sp
mov al,_gdtype
cmp al,3
je cg
cmp al,4
je mono
cmp al,5
je ecd
jmp short done
cg:
ecd:
mov al,3
jmp short set
mono:
mov al,7
set:
xor ah,ah
int 10h
done:
pop bp
ret
_gpterm endp
_text ends
end